home *** CD-ROM | disk | FTP | other *** search
/ GBL 1 / GBL 1.iso / menu / gifv.slq < prev    next >
Encoding:
Text File  |  1993-02-17  |  1.7 KB  |  58 lines
  1. ;
  2. ; GIFV.SLQ
  3. ; This script shows how to use the IFBMP, IFGIF, IFPCX and ENTER commands.
  4. ; The PRINTER, PRINTER-ON, PRINTER-OFF and PRINTER-FF commands are used here.
  5. ;
  6. ; All files in the current directory will be checked against the 3 different
  7. ; supported extensions. Depending on the file type, a different counter will
  8. ; be incremented. At the end all three counters will be display showing how
  9. ; many of each type of file you have!
  10. ;
  11.         change-path *.*
  12.         set    v1 0
  13.         set    v2 0
  14.         set    v3 0
  15.         set    v4 0
  16. :toploop
  17.         ifbmp       :dobmp
  18.         ifgif       :dogif
  19.         ifpcx       :dopcx
  20.         echo File type is NOT supported!
  21.         goto        :doloop
  22. :dobmp
  23.         set v1 +
  24.         goto        :doloop
  25. :dogif
  26.         set v2 +
  27.         goto        :doloop
  28. :dopcx
  29.         set v3 +
  30.         goto        :doloop
  31. :doloop
  32.         set v4 +
  33.         skipnext    :exit
  34.         goto        :toploop
  35. :exit
  36.         printer-on
  37.         echo Total files processed is displayed below
  38.         display  V4
  39.         echo The number of BMP files is displayed below
  40.         display  v1
  41.         echo The number of GIF files is displayed below
  42.         display  v2
  43.         echo The number of PCX files is displayed below
  44.         display  v3
  45.         printer-ff
  46.  
  47.         printer report.prn
  48.         echo Total files processed is displayed below
  49.         display  V4
  50.         echo The number of BMP files is displayed below
  51.         display  v1
  52.         echo The number of GIF files is displayed below
  53.         display  v2
  54.         echo The number of PCX files is displayed below
  55.         display  v3
  56.         printer-off
  57.         ENTER
  58.